IniPath Property Example

This example sets the path in the IniPath property to an application's key in the Windows Registry.

Sub IniPathX()

    ' Change the IniPath property to point to a different 
    ' section of the Windows Registry for settings 
    ' information.
    Debug.Print "Original IniPath setting = " & _
        IIf(DBEngine.IniPath = "", "[Empty]", _
        DBEngine.IniPath)
    DBEngine.IniPath = _
        "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\" & _
        "Jet\4.0\ISAM Formats\Excel 5.0"
    Debug.Print "New IniPath setting = " & _
        IIf(DBEngine.IniPath = "", "[Empty]", _
        DBEngine.IniPath)

End Sub